home *** CD-ROM | disk | FTP | other *** search
/ MacWorld: Super Stacks! / Macworld CD.iso / HyperCard Archives / International / French v1.2.5.1 / Piles principales / Notes sur la version 1.2.5 / card_4502.txt < prev    next >
Text File  |  1989-10-04  |  6KB  |  262 lines
  1. -- card: 4502 from stack: in.5
  2. -- bmap block id: 12474
  3. -- flags: 0000
  4. -- background id: 2946
  5. -- name: Menu Principal
  6. ----- HyperTalk script -----
  7. on popUp topics
  8.   set cursor to 4
  9.   lock screen
  10.   if the visible of button id 8 is false then
  11.     hide card field "Commentaires"
  12.     show card field "Liste compl√©mentaire"
  13.     show button id 8
  14.     show button "Fermer"
  15.     show button "Cliquez sur le th√®me d√©sir√©."
  16.   else if the short name of card button id 8 is the short name of the target then
  17.     send "mouseUp" to btn "Fermer"
  18.     unlock screen
  19.     exit popUp
  20.   end if
  21.   put topics into card field "Liste compl√©mentaire"
  22.   set the name of card button id 8 to the short name of the target
  23.   unlock screen
  24. end popUp
  25.  
  26.  
  27.  
  28.  
  29. -- part 2 (field)
  30. -- low flags: 01
  31. -- high flags: 2000
  32. -- rect: left=232 top=85 right=130 bottom=499
  33. -- title width / last selected line: 0
  34. -- icon id / first selected line: 0 / 0
  35. -- text alignment: 0
  36. -- font id: 2
  37. -- text size: 12
  38. -- style flags: 0
  39. -- line height: 14
  40. -- part name: Commentaires
  41.  
  42.  
  43. -- part 3 (button)
  44. -- low flags: 00
  45. -- high flags: A000
  46. -- rect: left=18 top=169 right=191 bottom=235
  47. -- title width / last selected line: 0
  48. -- icon id / first selected line: 0 / 0
  49. -- text alignment: 65535
  50. -- font id: 2
  51. -- text size: 12
  52. -- style flags: 0
  53. -- line height: 16
  54. -- part name: Nouvelles fonctions HyperCard
  55. ----- HyperTalk script -----
  56. on mouseUp
  57.   popUp "A propos de la version 1.2.5" &return& "Retour = Tabulation" &return& "Copier un champ et son texte" &return& "D√©placer une figure" &return& "Raccourcis pour l'interligne" &return& "Piles et serveurs de fichiers" &return& "Piles prot√©g√©es"
  58. end mouseUp
  59.  
  60.  
  61.  
  62.  
  63.  
  64. -- part 4 (button)
  65. -- low flags: 00
  66. -- high flags: A000
  67. -- rect: left=18 top=190 right=212 bottom=235
  68. -- title width / last selected line: 0
  69. -- icon id / first selected line: 0 / 0
  70. -- text alignment: 65535
  71. -- font id: 2
  72. -- text size: 12
  73. -- style flags: 0
  74. -- line height: 16
  75. -- part name: Nouvelles commandes HyperTalk
  76. ----- HyperTalk script -----
  77. on mouseUp
  78.   popUp "Find" &return& "Hide Picture" &return& "Lock et Unlock Screen" &return& "Select" &return& "Show Picture"
  79. end mouseUp
  80.  
  81.  
  82.  
  83. -- part 5 (button)
  84. -- low flags: 00
  85. -- high flags: A000
  86. -- rect: left=18 top=211 right=233 bottom=235
  87. -- title width / last selected line: 0
  88. -- icon id / first selected line: 0 / 0
  89. -- text alignment: 65535
  90. -- font id: 2
  91. -- text size: 12
  92. -- style flags: 0
  93. -- line height: 16
  94. -- part name: Nouvelles fonctions HyperTalk
  95. ----- HyperTalk script -----
  96. on mouseUp
  97.   popUp "clickH et clickV" &return& "foundChunk" &return& "foundField" &return& "foundLine" &return& "foundText" &return& "Number" &return& "selectedChunk" &return& "selectedField" &return& "selectedLine" &return& "selectedText"
  98. end mouseUp
  99.  
  100.  
  101.  
  102.  
  103.  
  104.  
  105. -- part 6 (button)
  106. -- low flags: 00
  107. -- high flags: A000
  108. -- rect: left=18 top=232 right=254 bottom=235
  109. -- title width / last selected line: 0
  110. -- icon id / first selected line: 0 / 0
  111. -- text alignment: 65535
  112. -- font id: 2
  113. -- text size: 12
  114. -- style flags: 0
  115. -- line height: 16
  116. -- part name: Nouvelles propriétés HyperTalk
  117. ----- HyperTalk script -----
  118. on mouseUp
  119.   popUp "autoTab" &return& "cantDelete" &return& "cantModify" &return& "Cursor" &return& "showPict" &return& "userModify"
  120. end mouseUp
  121.  
  122.  
  123.  
  124. -- part 7 (button)
  125. -- low flags: 00
  126. -- high flags: A000
  127. -- rect: left=18 top=253 right=275 bottom=235
  128. -- title width / last selected line: 0
  129. -- icon id / first selected line: 0 / 0
  130. -- text alignment: 65535
  131. -- font id: 2
  132. -- text size: 12
  133. -- style flags: 0
  134. -- line height: 16
  135. -- part name: Autres nouveautés HyperTalk
  136. ----- HyperTalk script -----
  137. on mouseUp
  138.   popUp "Nouveaux synonymes" &return& "Acc√®s direct aux scripts" &return& "Me et Target" &return& "Nouveaux messages syst√®me" &return& "Coordonn√©es"
  139. end mouseUp
  140.  
  141.  
  142.  
  143.  
  144. -- part 8 (button)
  145. -- low flags: 80
  146. -- high flags: C002
  147. -- rect: left=232 top=92 right=112 bottom=489
  148. -- title width / last selected line: 0
  149. -- icon id / first selected line: 0 / 0
  150. -- text alignment: 1
  151. -- font id: 2
  152. -- text size: 12
  153. -- style flags: 256
  154. -- line height: 16
  155. -- part name: Nouvelles fonctions HyperCard
  156.  
  157.  
  158. -- part 9 (button)
  159. -- low flags: 80
  160. -- high flags: C002
  161. -- rect: left=232 top=112 right=132 bottom=489
  162. -- title width / last selected line: 0
  163. -- icon id / first selected line: 0 / 0
  164. -- text alignment: 1
  165. -- font id: 2
  166. -- text size: 12
  167. -- style flags: 256
  168. -- line height: 16
  169. -- part name: Cliquez sur le thème désiré.
  170.  
  171.  
  172. -- part 10 (field)
  173. -- low flags: 81
  174. -- high flags: 2002
  175. -- rect: left=232 top=131 right=294 bottom=489
  176. -- title width / last selected line: 0
  177. -- icon id / first selected line: 0 / 0
  178. -- text alignment: 0
  179. -- font id: 2
  180. -- text size: 12
  181. -- style flags: 0
  182. -- line height: 14
  183. -- part name: Liste complémentaire
  184. ----- HyperTalk script -----
  185. on mouseup
  186.   get clickLine()
  187.   put line it of me into cardName
  188.   if cardName is not empty then
  189.     -- s√©lection de la ligne
  190.     get offset(return & cardName,me) + 1
  191.     select char it to length(cardName) + it of me
  192.     wait 15
  193.     set cursor to watch
  194.     visual barn door open
  195.     go to card cardName
  196.   else
  197.     exit mouseup
  198.   end if
  199. end mouseup
  200.  
  201.  
  202.  
  203. -- part 11 (button)
  204. -- low flags: 80
  205. -- high flags: A003
  206. -- rect: left=423 top=266 right=288 bottom=482
  207. -- title width / last selected line: 0
  208. -- icon id / first selected line: 0 / 0
  209. -- text alignment: 1
  210. -- font id: 0
  211. -- text size: 12
  212. -- style flags: 0
  213. -- line height: 16
  214. -- part name: Fermer
  215. ----- HyperTalk script -----
  216. on mouseup
  217.   cleanUpFirstCard
  218. end mouseup
  219.  
  220.  
  221. -- part 12 (button)
  222. -- low flags: 00
  223. -- high flags: 8000
  224. -- rect: left=66 top=132 right=154 bottom=189
  225. -- title width / last selected line: 0
  226. -- icon id / first selected line: 0 / 0
  227. -- text alignment: 65535
  228. -- font id: 2
  229. -- text size: 12
  230. -- style flags: 256
  231. -- line height: 16
  232. -- part name: Menu principal
  233.  
  234.  
  235. -- part contents for card part 2
  236. ----- text -----
  237. Cliquez sur le th√®me de votre choix dans le Menu principal.
  238.  
  239. -- part contents for background part 5
  240. ----- text -----
  241. Notes sur la version 1.2.5 d'HyperCard
  242.  
  243. -- part contents for background part 1
  244. ----- text -----
  245.  
  246.  
  247.  
  248.  
  249.  
  250.  
  251.  
  252.  
  253.  
  254.  
  255.  
  256.  
  257.  
  258.  
  259.  
  260.  
  261.  
  262.